﻿Namespace Scripting

    Public Enum FileUse
        ForAppending
        ForReading
    End Enum

    Public Class FileSystemObject

        Public Function FolderExists(ByVal Folder As Boolean) As Boolean

            FolderExists = True

        End Function

        Public Function CreateFolder(ByVal Path)

        End Function

        Public Sub MoveFile(ByVal Source, ByVal Dest)

        End Sub

        Public Sub CopyFile(ByVal Source, ByVal Dest)

        End Sub

        Public Function FileExists(ByVal File)

        End Function

        Public Sub DeleteFile(ByVal File, ByVal Force)

        End Sub

        Public Function OpenTextFile(ByVal Path, ByVal FileUse, ByVal Create)

        End Function

    End Class

    

End Namespace